#pragma once
#include "nocopy.hpp"
#include "Log.hpp"
#include <arpa/inet.h>
#include <netinet/in.h>
#include <sys/types.h>
#include <sys/wait.h>
#include <sys/socket.h>
#include <pthread.h>
#include <functional>
#include "comm.hpp"
#include <cstring>
#include <unistd.h>
#include "Inet_Addr.hpp"
#include "ThreadPool.hpp"
#include <unordered_map>

const int default_port = 8888;
const int default_backlog = 5;

using task_t = std::function<void()>;
using callback_t = std::function<void(int, Inet_Addr &)>;

// class TcpServer;
// class ThreadData
// {
// public:
//     ThreadData(const int &sockfd, TcpServer *tvr, const Inet_Addr &addr)
//         : _sockfd(sockfd), _tvr(tvr), _addr(addr)
//     {
//     }
//     TcpServer *getserver()
//     {
//         return _tvr;
//     }
//     int getsockfd()
//     {
//         return _sockfd;
//     }

// private:
//     int _sockfd;
//     TcpServer *_tvr;

// public:
//     Inet_Addr _addr;
// };
class TcpServer : public nocopy
{
public:
    TcpServer(const uint16_t port = default_port)
        : _port(port), _isRunning(false)
    {
    }

    void Init()
    {
        // 1.创建套接字
        _listensock = socket(AF_INET, SOCK_STREAM, 0);
        if (_listensock < 0)
        {
            lg.LogMessage(Fatal, "create sock error, errno code: %d, errno string: %s\n", errno, strerror(errno));
            exit(Socket_Err);
        }
        lg.LogMessage(Debug, "create sock success, sockfd: %d\n", _listensock);

        // 2.初始化网络信息，并进行bind
        struct sockaddr_in local;
        local.sin_family = AF_INET;
        local.sin_port = htons(_port);
        local.sin_addr.s_addr = INADDR_ANY;

        // 2.1 bind信息
        if (bind(_listensock, CONV(&local), sizeof(local)) != 0)
        {
            lg.LogMessage(Fatal, "bind socket error, errno code: %d, error string: %s\n", errno, strerror(errno));
            exit(Bind_Err);
        }
        lg.LogMessage(Debug, "bind sock success, sockfd: %d\n", _listensock);

        // 3.设置监听
        if (listen(_listensock, default_backlog) != 0)
        {
            lg.LogMessage(Fatal, "listen socket error, errno code: %d, error string: %s\n", errno, strerror(errno));
            exit(Bind_Err);
        }
        lg.LogMessage(Debug, "listen sock success, sockfd: %d\n", _listensock);

        ThreadNs::ThreadPool<task_t>::GetInstance()->Start();
        funcs.insert(std::make_pair("defaultService", std::bind(&TcpServer::DefaultService, this, std::placeholders::_1, std::placeholders::_2)));
    }

    // void Service(const int &sockfd)
    // {
    //     while (true)
    //     {
    //         char buffer[1024];
    //         ssize_t n = read(sockfd, buffer, sizeof(buffer) - 1);
    //         if (n > 0)
    //         {
    //             buffer[n] = 0;
    //             std::cout << "client say# " << buffer << std::endl;

    //             std::string infobuffer;
    //             infobuffer += "server say# ";
    //             infobuffer += buffer;
    //             write(sockfd, infobuffer.c_str(), infobuffer.size());
    //         }
    //         else if (n == 0) // 如果读取到0了，说明读到文件结尾了，说明客户端退出了
    //         {
    //             lg.LogMessage(Info, "client quit...\n");
    //             break;
    //         }
    //         else
    //         {
    //             lg.LogMessage(Error, "read socket error, errno code: %d, error string: %s\n", errno, strerror(errno));
    //             break;
    //         }
    //     }
    // }

    // void Service(const int &sockfd, Inet_Addr &addr)
    // {
    //     while (true)
    //     {
    //         char buffer[1024];
    //         ssize_t n = read(sockfd, buffer, sizeof(buffer) - 1);
    //         if (n > 0)
    //         {
    //             buffer[n] = 0;
    //             std::cout << addr.PrintDebug() << "# " << buffer << std::endl;

    //             std::string infobuffer;
    //             infobuffer += "server say# ";
    //             infobuffer += buffer;
    //             write(sockfd, infobuffer.c_str(), infobuffer.size());
    //         }
    //         else if (n == 0) // 如果读取到0了，说明读到文件结尾了，说明客户端退出了
    //         {
    //             lg.LogMessage(Info, "client quit...\n");
    //             break;
    //         }
    //         else
    //         {
    //             lg.LogMessage(Error, "read socket error, errno code: %d, error string: %s\n", errno, strerror(errno));
    //             break;
    //         }
    //     }
    // }

    // static void *HandlerRequest(void *args) // 形参中不能有this指针，使用static
    // {
    //     ThreadData *td = static_cast<ThreadData *>(args);
    //     pthread_detach(pthread_self()); // 线程分离，主线程和从线程自己做自己的事情
    //     td->getserver()->Service(td->getsockfd(), td->_addr);
    //     return nullptr;
    // }

    void Start()
    {
        _isRunning = true;
        while (_isRunning)
        {
            // 4.获取连接
            struct sockaddr_in peer;
            socklen_t len = sizeof(peer);
            int sockfd = accept(_listensock, CONV(&peer), &len);
            if (sockfd < 0) // 一直接受，直到接受成功
            {
                lg.LogMessage(Warning, "accept socket error, errno code: %d, error string: %s\n", errno, strerror(errno));
                continue;
            }
            lg.LogMessage(Debug, "accept success, get new a sockfd: %d\n", sockfd);

            // 5.提供服务
            // v1
            // Service(sockfd);
            // close(sockfd);

            // v2 - 多进程
            // pid_t id = fork();
            // if (id == 0)
            // {
            //     // 子进程
            //     close(_listensock); // 子进程将监听文件描述符关闭
            //     if (fork() > 0)
            //         exit(0);

            //     // 孙子进程
            //     Service(sockfd);
            //     close(sockfd);
            //     exit(0);
            // }
            // else if (id > 0)
            // {
            //     // 父进程
            //     close(sockfd);
            //     pid_t pid = waitpid(id, nullptr, 0); // 阻塞等待
            //     if (pid == id)
            //     {
            //         //
            //     }
            // }
            // else
            // {
            //     // 创建进程失败，重新来
            //     close(sockfd);
            //     continue;
            // }

            // v3 - 多线程
            // ThreadData *td = new ThreadData(sockfd, this, peer);
            // pthread_t tid;
            // pthread_create(&tid, nullptr, HandlerRequest, td);

            // v4 - 线程池
            task_t t = std::bind(&TcpServer::Routine, this, sockfd, Inet_Addr(peer));
            ThreadNs::ThreadPool<task_t>::GetInstance()->Push(t);
            // 创建线程池的单例模式，并且在线程池中放入任务
        }
    }

    std::string Read(int sockfd) // 首先读取用户输入，再决定执行什么任务
    {
        char type[1024];
        ssize_t n = read(sockfd, type, sizeof(type) - 1);
        if (n > 0)
        {
            type[n] = 0;
        }
        else if (n == 0) // 如果读取到0了，说明读到文件结尾了，说明客户端退出了
        {
            lg.LogMessage(Info, "client quit...\n");
        }
        else
        {
            lg.LogMessage(Error, "read socket error, errno code: %d, error string: %s\n", errno, strerror(errno));
        }
        return type;
    }

    void Routine(int sockfd, Inet_Addr addr)
    {
        funcs["defaultService"](sockfd, addr);
        std::string type = Read(sockfd);
        lg.LogMessage(Debug, "%s select %s\n", addr.PrintDebug().c_str(), type.c_str());
        if (type == "ping")
            funcs[type](sockfd, addr);
        else if (type == "translate") // 翻译
            funcs[type](sockfd, addr);
        else if (type == "transform") // 转变
            funcs[type](sockfd, addr);
        else
        {
        }
        close(sockfd);
    }

    void DefaultService(int sockfd, Inet_Addr &addr)
    {
        (void)addr;
        std::string service_list = " |";
        for (auto func : funcs)
        {
            service_list += func.first;
            service_list += "|";
        }
        write(sockfd, service_list.c_str(), service_list.size());
    }

    void RegisterFunc(std::string type, callback_t func) // 创建任务
    {
        funcs[type] = func;
    }

    ~TcpServer()
    {
    }

private:
    int _listensock;
    bool _isRunning;
    uint16_t _port;

    // 创建业务逻辑
    std::unordered_map<std::string, callback_t> funcs;
};